inherited FPesquisaTipoVenda: TFPesquisaTipoVenda
  Caption = 'Pesquisa Tipo Venda'
  ClientHeight = 316
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel
    inherited BtnLimpar: TBitBtn
      OnClick = BtnLimparClick
    end
    inherited BtnImprimir: TBitBtn
      OnClick = BtnImprimirClick
    end
    inherited BtnSelecionar: TBitBtn
      OnClick = BtnSelecionarClick
    end
  end
  inherited Panel1: TPanel
    Height = 275
    object Label2: TLabel [0]
      Left = 77
      Top = 2
      Width = 67
      Height = 13
      Caption = 'Codigo Venda'
    end
    object Label1: TLabel [1]
      Left = 3
      Top = 36
      Width = 48
      Height = 13
      Caption = 'Descri'#231#227'o'
    end
    object Label3: TLabel [2]
      Left = 3
      Top = 72
      Width = 28
      Height = 13
      Caption = 'CFOP'
    end
    object Label4: TLabel [3]
      Left = 51
      Top = 74
      Width = 48
      Height = 13
      Caption = 'Descri'#231#227'o'
    end
    object Label5: TLabel [4]
      Left = 3
      Top = 1
      Width = 33
      Height = 13
      Caption = 'C'#243'digo'
    end
    inherited DBGrid1: TDBGrid
      Top = 157
      Height = 97
      TabOrder = 5
      Columns = <
        item
          Expanded = False
          FieldName = 'TIPVEND_CODIGO'
          Title.Caption = 'C'#243'digo'
          Width = 57
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'TIPVEND_CODIGOVENDA'
          Title.Caption = 'C'#243'digo Venda'
          Width = 87
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'TIPVEND_DESCRICAO'
          Title.Caption = 'Descri'#231#227'o'
          Width = 228
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CFOP_CODIGOFISCAL'
          Title.Caption = 'CFOP'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CFOP_DESCRICAO'
          Title.Caption = 'CFOP Descri'#231#227'o'
          Width = 65
          Visible = True
        end>
    end
    inherited Panel3: TPanel
      Top = 254
      TabOrder = 6
    end
    object MECodigoVenda: TMaskEdit
      Left = 77
      Top = 16
      Width = 38
      Height = 21
      EditMask = '9.99;1;_'
      MaxLength = 4
      TabOrder = 0
      Text = ' .  '
    end
    object DBLCBTipoVenda: TDBLookupComboBox
      Left = 3
      Top = 50
      Width = 404
      Height = 21
      DataField = 'TIPVEND_CFOP'
      KeyField = 'TIPVEND_CODIGO'
      ListField = 'TIPVEND_DESCRICAO'
      ListSource = DSTipoVenda
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
    end
    object MECFO: TMaskEdit
      Left = 3
      Top = 88
      Width = 40
      Height = 21
      EditMask = '9.999;1;_'
      MaxLength = 5
      TabOrder = 2
      Text = ' .   '
    end
    object DBLCBCFOP: TDBLookupComboBox
      Left = 51
      Top = 88
      Width = 355
      Height = 21
      DataField = 'TIPVEND_CFOP'
      KeyField = 'CFOP_CODIGO'
      ListField = 'CFOP_DESCRICAO'
      ListSource = DSCFOP
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
    end
    object RGNatureza: TRadioGroup
      Left = 3
      Top = 110
      Width = 405
      Height = 45
      Caption = 'Natureza Opera'#231#227'o'
      Columns = 2
      ItemIndex = 3
      Items.Strings = (
        '1 - Mercadoria'
        '2 - Servi'#231'o'
        '3 - Mercadoria/Servi'#231'o'
        '4 - Todos')
      TabOrder = 4
    end
    object ECodigo: TEdit
      Left = 3
      Top = 15
      Width = 70
      Height = 21
      TabOrder = 7
      OnKeyPress = ECodigoKeyPress
    end
  end
  inherited QPesquisa: TQuery
    Active = True
    SQL.Strings = (
      
        'Select TIPOVENDA.*,CFOP_CODIGOFISCAL,CFOP_Descricao From TIPOVEN' +
        'DA inner Join CFOP on  TIPVEND_CFOP = CFOP_Codigo '
      'Order By TIPVEND_CODIGOVENDA,TIPVEND_DESCRICAO ')
    Left = 200
    Top = 209
  end
  inherited DSPesquisa: TDataSource
    Left = 232
    Top = 209
  end
  object DSCFOP: TDataSource
    DataSet = DMFinanceiro.QCFOP
    Left = 184
    Top = 89
  end
  object DSTipoVenda: TDataSource
    DataSet = DMFinanceiro.QTipoVenda
    Left = 184
    Top = 49
  end
end
